<?
	/* Se asegura que el archivo es incluido por el index */
		defined( 'LOAD_MODULE_ACTION' ) or die( 'No esta permitido el acceso directo a ' . __FILE__ );
	/* Cuando se hace el include del archivo automaticamente crea un objeto y lo guarda en una variable temporal */
		$this->oTmpObject = new Computadora_frm( $this );

	class Computadora_frm extends Frm
	{
	function setValue ( $ncComputadora )
		{
			$cSql = "SELECT ncComputadora, cIp, ncTipoComputadora, cdComputadora, cIdentificador, bGrupal, ncPersona
								FROM atComputadora
								WHERE ncComputadora = $ncComputadora";
			$aRow = $this->oDatabase->getArray($cSql);
			$this->setFieldsArray ( $aRow );
			return $aRow;
		}
	function Computadora_frm( &$oModule )
		{
			$this->Frm( $oModule );
			//Crea los Objetos de los campos de edicion
			$this->aFields['ncComputadora']			= new Input( "Codigo", "ncComputadora", '', false, true );
			$this->aFields['cdComputadora']			= new InputText( "Nombre", "cdComputadora" );
			$this->aFields['cIdentificador']				= new InputText( "Serie", "cIdentificador" );
			$this->aFields['ncPersona']					= new InputLookUp( "Responsable", "ncPersona" );
			$this->aFields['cIp']								= new InputText( "Ip", "cIp" );
			$this->aFields['ncTipoComputadora']	= new InputList( "Tipo", "ncTipoComputadora" );
			if ( getParam('ncSolicitante_Key') ) $this->aFields['ncPersona']->setValue ( getParam('ncSolicitante_Key')  );
		}
	function initializeForm()
		{
			// Configura el Titulo
			$this->setLabel( "Computadora" );
			if ( $this->isRetrievable() &&  $this->aFields['ncComputadora']->getValue() )
			{
				$aRow = $this->setValue ( $this->aFields['ncComputadora']->getValue() );
			}
			return true;
		}
	function initializeField( $cField , &$oField )
		{
			switch ( $cField )
			{
				case 'cdComputadora':
				// Configura el Nombre
					$oField->setMandatory( $this->isMandatory() );
					$oField->setLength(40);
				break;
				case 'cIdentificador':
					//$oField->setMandatory( $this->isMandatory() );
					$oField->setLength(15);
				break;
				case 'ncTipoComputadora':
					$cSql = "SELECT ncTipoComputadora, cdTipoComputadora FROM acTipoComputadora";
					$oField->setMatrix ( $this->oDatabase->getMatrix( $cSql ) );
					$oField->setDefault(1);
				break;
				case 'cIp':
					$oField->setLength(15);
				break;
				case 'ncPersona':
					$oField->setForm( $this );
					initializePersonal( $oField );
				break;
			}
		}
	}
?>